\section{Ejercicio 2: \textit{funciones de tablero}}
\subsection{Enunciado}

Definir las funciones
\texttt{
\\ contenido :: Posicion $\to$ Tablero $\to$ Maybe Ficha
\\ poner :: Ficha $\to$ Posicion $\to$ Tablero $\to$ Tablero
\\ sacar :: Posicion $\to$ Tablero $\to$ Tablero
}
\\de tal manera que contenido devuelva el contenido del tablero en la posici\'on indicada, poner
ubique una ficha y sacar quite una ficha de la posici\'on indicada. En caso de haber una ficha
en la posicion dada, poner debe reemplazar el contenido de esa posici\'on por la nueva ficha.

\subsection{Codigo}

\scriptsize\begin{verbatim}

 contenido :: Posicion -> Tablero -> Maybe Ficha
 contenido p (T f) = f p

 poner :: Posicion -> Ficha -> Tablero -> Tablero
 poner (a,b) ficha (T f) = T (\(i,j) -> if (i == a && j == b) then Just ficha else f(i,j) )

 sacar :: Posicion -> Tablero -> Tablero
 sacar (a,b) (T f) = T (\(i,j) -> if (i == a && j == b) then Nothing else f(i,j) )

\end{verbatim}
\normalsize

